TOP
Функция VBA: Mid
Описание
Функция VBA MID возвращает указанное количество символов из строки символов, начиная с указанного номера символа.
Синтаксис MID
Mid(текст, начало)
Или
Mid(текст, начало, количество_символов)
Пример VBA Mid
Получить разные части текста из строки:
- Sub MidExample()
-
- MsgBox Mid("www.moonexcel.com.ua", 1, 1)
- MsgBox Mid("www.moonexcel.com.ua", 1, 3)
- MsgBox Mid("www.moonexcel.com.ua", 1, 13)
- MsgBox Mid("www.moonexcel.com.ua", 1, 30)
-
- MsgBox Mid("www.moonexcel.com.ua", 5, 9)
- MsgBox Mid("www.moonexcel.com.ua", 5, 4)
- MsgBox Mid("www.moonexcel.com.ua", 9, 5)
- MsgBox Mid("www.moonexcel.com.ua", 16, 3)
- MsgBox Mid("www.moonexcel.com.ua", 5, 50)
- MsgBox Mid("www.moonexcel.com.ua", 5)
-
- End Sub
Sub MidExample()
MsgBox Mid("www.moonexcel.com.ua", 1, 1) 'Возвращает: w
MsgBox Mid("www.moonexcel.com.ua", 1, 3) 'Возвращает: www
MsgBox Mid("www.moonexcel.com.ua", 1, 13) 'Возвращает: www.moonexcel
MsgBox Mid("www.moonexcel.com.ua", 1, 30) 'Возвращает: www.moonexcel.com.ua
MsgBox Mid("www.moonexcel.com.ua", 5, 9) 'Возвращает: moonexcel
MsgBox Mid("www.moonexcel.com.ua", 5, 4) 'Возвращает: moon
MsgBox Mid("www.moonexcel.com.ua", 9, 5) 'Возвращает: excel
MsgBox Mid("www.moonexcel.com.ua", 16, 3) 'Возвращает: com
MsgBox Mid("www.moonexcel.com.ua", 5, 50) 'Возвращает: moonexcel.com.ua
MsgBox Mid("www.moonexcel.com.ua", 5) 'Возвращает: moonexcel.com.ua
End Sub